﻿Public Class Menu

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Sesion.Visible = True
    End Sub

    Private Sub btnIngresar_Click(sender As Object, e As EventArgs) Handles btnIngresar.Click
        If txtRut.Text = 1 Then
            Nutricion.Visible = True
        End If
        If txtRut.Text = 2 Then
            Minuta.Visible = True
        End If
        If txtRut.Text = 3 Then
            Bodega.Visible = True
        End If
    End Sub
End Class
